home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2004 #2 / Amiga Plus CD - 2004 - No. 02.iso / AmigaPlus / Tools / Development / AmigaTalk / prelude / Class.p < prev    next >
Text File  |  2004-01-31  |  3KB  |  81 lines

  1. pTempVar <- <primitive 110 13 >
  2. <primitive 112 pTempVar 1  " getByteArray: " \
  3.   #( #[ 16r20 16r21 16rFA 16r02 16r9F 16rF3] \
  4.     #(  )) >
  5.  
  6. <primitive 112 pTempVar 2  " view " \
  7.   #( #[ 16r20 16rFA 16r01 16r9C 16rF2 16rF5] \
  8.     #(  )) >
  9.  
  10. <primitive 112 pTempVar 3  " variables " \
  11.   #( #[ 16r20 16rFA 16r01 16r9E 16rF3] \
  12.     #(  )) >
  13.  
  14. <primitive 112 pTempVar 4  " superClass " \
  15.   #( #[ 16r20 16rFA 16r01 16r97 16rF3] \
  16.     #(  )) >
  17.  
  18. <primitive 112 pTempVar 5  " respondsTo: " \
  19.   #( #[ 16r20 16r72 16r22 16rA2 16rF7 16r12 16r22 16r21 16rFA 16r02 16r9B \
  20.         16rF7 16r02 16r5B 16rF3 16rF2 16r22 16r0A 16r2E 16rF1 16r72 \
  21.         16rF2 16rF9 16r16 16rF2 16r5C 16rF3] \
  22.     #(  )) >
  23.  
  24. <primitive 112 pTempVar 6  " respondsTo " \
  25.   #( #[ 16r20 16rFA 16r01 16r9A 16rF2 16rF5] \
  26.     #(  )) >
  27.  
  28. <primitive 112 pTempVar 7  " printClassString " \
  29.   #( #[ 16r20 16rFA 16r01 16r98 16rF3] \
  30.     #(  )) >
  31.  
  32. <primitive 112 pTempVar 8  " new: " \
  33.   #( #[ 16r5E 16r80 16r00 16rF2 16r31 16r54 16r50 16r20 16rFA 16r03 16rFA \
  34.         16rFA 16r02 16r5B 16rF7 16r1D 16r54 16r53 16r20 16rFA 16r03 \
  35.         16rFA 16r73 16r23 16r5D 16rB6 16rF7 16r0E 16r20 16r21 16rB4 \
  36.         16r72 16r54 16r54 16r20 16r22 16rFA 16r04 16rFA 16rF2 16r22 \
  37.         16rF3 16rF2 16r23 16rF3 16rF2 16r5E 16r80 16r02 16rF2 16r20 \
  38.         16r21 16rB4 16rF3] \
  39.     #( #tracingOff #Singleton_Class #tracingOn  )) >
  40.  
  41. <primitive 112 pTempVar 9  " basicNew: " \
  42.   #( #[ 16r5E 16r80 16r00 16rF2 16r20 16rFA 16r01 16r97 16r72 16r22 16rFA \
  43.         16r01 16r03 16rF7 16r04 16r22 16rA0 16rF1 16r73 16rF2 16r20 \
  44.         16r23 16rFA 16r02 16r99 16r73 16r20 16r31 16rFA 16r02 16r9B \
  45.         16rF7 16r05 16r23 16r21 16rB0 16rF1 16r73 16rF2 16r5E 16r80 \
  46.         16r02 16rF2 16r23 16rF3] \
  47.     #( #tracingOff #new: #tracingOn  )) >
  48.  
  49. <primitive 112 pTempVar 10  " new " \
  50.   #( #[ 16r5E 16r80 16r00 16rF2 16r31 16r54 16r50 16r20 16rFA 16r03 16rFA \
  51.         16rFA 16r02 16r5B 16rF7 16r1C 16r54 16r53 16r20 16rFA 16r03 \
  52.         16rFA 16r72 16r22 16r5D 16rB6 16rF7 16r0D 16r20 16rAD 16r71 \
  53.         16r54 16r54 16r20 16r21 16rFA 16r04 16rFA 16rF2 16r21 16rF3 \
  54.         16rF2 16r22 16rF3 16rF2 16r5E 16r80 16r02 16rF2 16r20 16rAD \
  55.         16rF3] \
  56.     #( #tracingOff #Singleton_Class #tracingOn  )) >
  57.  
  58. <primitive 112 pTempVar 11  " basicNew " \
  59.   #( #[ 16r5E 16r80 16r00 16rF2 16r20 16rFA 16r01 16r97 16r71 16r21 16rFA \
  60.         16r01 16r03 16rF7 16r04 16r21 16rA0 16rF1 16r72 16rF2 16r20 \
  61.         16r22 16rFA 16r02 16r99 16r72 16r20 16r31 16rFA 16r02 16r9B \
  62.         16rF7 16r04 16r22 16rA0 16rF1 16r72 16rF2 16r5E 16r80 16r02 \
  63.         16rF2 16r22 16rF3] \
  64.     #( #tracingOff #new #tracingOn  )) >
  65.  
  66. <primitive 112 pTempVar 12  " list " \
  67.   #( #[ 16r20 16rFA 16r01 16r9D 16rF2 16rF5] \
  68.     #(  )) >
  69.  
  70. <primitive 112 pTempVar 13  " edit " \
  71.   #( #[ 16r20 16rFA 16r01 16r96 16rF2 16rF5] \
  72.     #(  )) >
  73.  
  74. <primitive 98 #Class \
  75.   <primitive 97 #Class #Object #AmigaTalk:General/Class.st \
  76.    #(  ) \
  77.    #( #getByteArray: #view #variables #superClass #respondsTo: #respondsTo  \
  78.        #printClassString #new: #basicNew: #new #basicNew #list #edit  ) \
  79.   pTempVar 4 8 > #ordinary >
  80.  
  81.